OLEParameter Class

Use to pass an OLE parameter.

Properties

PassByRef

Position

Type

Value

ValueArray

Notes


Here is an example of the usage of the Value2D property.

Dim word as new WordApplication
Dim doc as WordDocument
Dim param as new OLEParameter
Dim pts(3, 1) As Variant
pts(0, 0) = 50
pts(0, 1) = 20
pts(1, 0) = 100
pts(1, 1) = 160
pts(2, 0) = 150
pts(2, 1) = 160
pts(3, 0) = 200
pts(3, 1) = 20

param.Type = OLEParameter.ParamTypeSingle
param.ValueArray = pts

doc = word.Documents.Add
doc.Shapes.AddCurve param
word.Visible = True

See Also

ExcelApplication, OLEContainer, OLEObject, PowerPointApplication, WordApplication classes; OLEException error.